home *** CD-ROM | disk | FTP | other *** search
/ EuroCD 3 / EuroCD 3.iso / Programming / SecalDemo / Inc / tagcalls / locale.inc < prev    next >
Encoding:
Text File  |  1998-06-24  |  211 b   |  10 lines
  1. pattern OpenCatalog(_locale,_name, ...) is
  2.     push a2\a6;
  3.     push.l ...;
  4.     safe a0:=_locale; a1:=_name; a2:=sp;;
  5.     a6:=LocaleBase; jsr [a6-150];
  6.     sp:=sp+countof(...)<<2;
  7.     pop a2\a6;
  8. endp;                                                            # OPENCATALOG
  9.  
  10.